home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / ct_xmp15 / eosexam.asm < prev    next >
Assembly Source File  |  1996-09-15  |  1KB  |  57 lines
  1. Locals
  2. .486p
  3. CODE32 SEGMENT PUBLIC PARA 'CODE' USE32
  4. ASSUME  CS:CODE32,DS:CODE32,ES:CODE32
  5.  
  6. INCLUDE ..\RESOURCE\EOS.INC
  7.  
  8. include mxmplay.inc
  9.  
  10. copyright db "mxmplay asm example  (c) '95/96 Niklas Beisert / pascal",10,13
  11.           db 'EOS conversion by Eclipse',13,10,10,'$'
  12. playing db 'playing "at0mic playboys" by Screamager... press any key to stop.$'
  13. byebye db 13,10,'thanks for listening',13,10,'$'
  14.  
  15. module:
  16. include atomic.inc
  17.  
  18. mxmdata db 4000h dup (?)
  19.  
  20.  
  21. Start32:
  22.             mov ah,9
  23.             mov edx,offset copyright
  24.             int 21h
  25.  
  26.  
  27.             mov edi,[Environment_addr]
  28.             call xmpGetGUSPort_
  29.             lea ebx,mxmdata
  30.             mov ecx,65536
  31.             mov esi,O module
  32.             mov dl,MXMINTMODEEOS
  33.             call xmpInit_
  34.             xor eax,eax
  35.             call xmpPlay_
  36.  
  37.             mov ah,9
  38.             mov edx,offset playing
  39.             int 21h
  40.  
  41.             xor ah,ah
  42.             DosInt 16h
  43.  
  44.             mov ah,9
  45.             mov edx,offset byebye
  46.             int 21h
  47.  
  48.             call xmpStop_
  49.  
  50.             mov ax,4c00h
  51.             int 21h
  52.  
  53.             CODE32 ENDS
  54.  
  55.             END
  56.  
  57.